home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_126161.txt < prev    next >
Text File  |  1990-08-14  |  7KB  |  401 lines
  1. -- card: 126161 from stack: in
  2. -- bmap block id: 128591
  3. -- flags: 4000
  4. -- background id: 14625
  5. -- name: School Timetable
  6. ----- HyperTalk script -----
  7. on doMenu menuItem
  8.   if menuItem is "Reserve" then
  9.     show card field "Reserved"
  10.   else if menuItem is "by teacher" then
  11.     lock screen
  12.     resetCard
  13.     go to card "By Teacher" of this background
  14.     unlock screen
  15.   else pass doMenu
  16. end doMenu
  17.  
  18. on groupThree
  19.   repeat with index = 3 to 14
  20.     set hilite of card button id index to false
  21.   end repeat
  22.   set hilite of target to true
  23. end groupThree
  24.  
  25. on resetCard
  26.   set hilite of card button id 3 to true
  27.   repeat with index = 4 to 14
  28.     set hilite of card button id index to false
  29.   end repeat
  30.   hide card field "Reserved"
  31. end resetCard
  32.  
  33.  
  34. -- part 15 (field)
  35. -- low flags: 81
  36. -- high flags: 0001
  37. -- rect: left=225 top=147 right=159 bottom=282
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 0 / 0
  40. -- text alignment: 1
  41. -- font id: 3
  42. -- text size: 9
  43. -- style flags: 0
  44. -- line height: 12
  45. -- part name: Reserved
  46.  
  47.  
  48. -- part 1 (button)
  49. -- low flags: 00
  50. -- high flags: 0000
  51. -- rect: left=0 top=0 right=342 bottom=512
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 0
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: 
  60.  
  61.  
  62. -- part 2 (button)
  63. -- low flags: 00
  64. -- high flags: 0000
  65. -- rect: left=27 top=31 right=46 bottom=42
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 5068 / 5068
  68. -- text alignment: 1
  69. -- font id: 0
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: Close
  74. ----- HyperTalk script -----
  75. on mouseDown
  76.   set icon of me to "Close Box Hi"
  77. end mouseDown
  78.  
  79. on mouseLeave
  80.   set icon of me to "Close Box"
  81. end mouseLeave
  82.  
  83. on mouseUp
  84.   set icon of me to "Close Box"
  85.   lock screen
  86.   resetCard
  87.   pop card
  88.   unlock screen
  89. end mouseUp
  90.  
  91.  
  92. -- part 3 (button)
  93. -- low flags: 00
  94. -- high flags: 4000
  95. -- rect: left=117 top=92 right=131 bottom=206
  96. -- title width / last selected line: 0
  97. -- icon id / first selected line: 0 / 0
  98. -- text alignment: 1
  99. -- font id: 0
  100. -- text size: 12
  101. -- style flags: 0
  102. -- line height: 16
  103. -- part name: 
  104. ----- HyperTalk script -----
  105. on mouseUp
  106.   groupThree
  107. end mouseUp
  108.  
  109.  
  110.  
  111. -- part 4 (button)
  112. -- low flags: 00
  113. -- high flags: 0000
  114. -- rect: left=117 top=134 right=173 bottom=206
  115. -- title width / last selected line: 0
  116. -- icon id / first selected line: 0 / 0
  117. -- text alignment: 1
  118. -- font id: 0
  119. -- text size: 12
  120. -- style flags: 0
  121. -- line height: 16
  122. -- part name: 
  123. ----- HyperTalk script -----
  124. on mouseUp
  125.   groupThree
  126. end mouseUp
  127.  
  128.  
  129.  
  130. -- part 5 (button)
  131. -- low flags: 00
  132. -- high flags: 0000
  133. -- rect: left=117 top=176 right=215 bottom=206
  134. -- title width / last selected line: 0
  135. -- icon id / first selected line: 0 / 0
  136. -- text alignment: 1
  137. -- font id: 0
  138. -- text size: 12
  139. -- style flags: 0
  140. -- line height: 16
  141. -- part name: 
  142. ----- HyperTalk script -----
  143. on mouseUp
  144.   groupThree
  145. end mouseUp
  146.  
  147.  
  148.  
  149. -- part 6 (button)
  150. -- low flags: 00
  151. -- high flags: 0000
  152. -- rect: left=117 top=218 right=257 bottom=206
  153. -- title width / last selected line: 0
  154. -- icon id / first selected line: 0 / 0
  155. -- text alignment: 1
  156. -- font id: 0
  157. -- text size: 12
  158. -- style flags: 0
  159. -- line height: 16
  160. -- part name: 
  161. ----- HyperTalk script -----
  162. on mouseUp
  163.   groupThree
  164. end mouseUp
  165.  
  166.  
  167.  
  168. -- part 7 (button)
  169. -- low flags: 00
  170. -- high flags: 0000
  171. -- rect: left=209 top=92 right=131 bottom=298
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 1
  175. -- font id: 0
  176. -- text size: 12
  177. -- style flags: 0
  178. -- line height: 16
  179. -- part name: 
  180. ----- HyperTalk script -----
  181. on mouseUp
  182.   groupThree
  183. end mouseUp
  184.  
  185.  
  186.  
  187. -- part 8 (button)
  188. -- low flags: 00
  189. -- high flags: 0000
  190. -- rect: left=209 top=134 right=173 bottom=298
  191. -- title width / last selected line: 0
  192. -- icon id / first selected line: 0 / 0
  193. -- text alignment: 1
  194. -- font id: 0
  195. -- text size: 12
  196. -- style flags: 0
  197. -- line height: 16
  198. -- part name: 
  199. ----- HyperTalk script -----
  200. on mouseUp
  201.   groupThree
  202. end mouseUp
  203.  
  204.  
  205.  
  206. -- part 9 (button)
  207. -- low flags: 00
  208. -- high flags: 0000
  209. -- rect: left=209 top=176 right=215 bottom=298
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 0 / 0
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: 
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   groupThree
  221. end mouseUp
  222.  
  223.  
  224.  
  225. -- part 10 (button)
  226. -- low flags: 00
  227. -- high flags: 0000
  228. -- rect: left=209 top=218 right=257 bottom=298
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 1
  232. -- font id: 0
  233. -- text size: 12
  234. -- style flags: 0
  235. -- line height: 16
  236. -- part name: 
  237. ----- HyperTalk script -----
  238. on mouseUp
  239.   groupThree
  240. end mouseUp
  241.  
  242.  
  243.  
  244. -- part 11 (button)
  245. -- low flags: 00
  246. -- high flags: 0000
  247. -- rect: left=301 top=92 right=131 bottom=390
  248. -- title width / last selected line: 0
  249. -- icon id / first selected line: 0 / 0
  250. -- text alignment: 1
  251. -- font id: 0
  252. -- text size: 12
  253. -- style flags: 0
  254. -- line height: 16
  255. -- part name: 
  256. ----- HyperTalk script -----
  257. on mouseUp
  258.   groupThree
  259. end mouseUp
  260.  
  261.  
  262.  
  263. -- part 12 (button)
  264. -- low flags: 00
  265. -- high flags: 0000
  266. -- rect: left=301 top=134 right=173 bottom=390
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 0 / 0
  269. -- text alignment: 1
  270. -- font id: 0
  271. -- text size: 12
  272. -- style flags: 0
  273. -- line height: 16
  274. -- part name: 
  275. ----- HyperTalk script -----
  276. on mouseUp
  277.   groupThree
  278. end mouseUp
  279.  
  280.  
  281.  
  282. -- part 13 (button)
  283. -- low flags: 00
  284. -- high flags: 0000
  285. -- rect: left=301 top=176 right=215 bottom=390
  286. -- title width / last selected line: 0
  287. -- icon id / first selected line: 0 / 0
  288. -- text alignment: 1
  289. -- font id: 0
  290. -- text size: 12
  291. -- style flags: 0
  292. -- line height: 16
  293. -- part name: 
  294. ----- HyperTalk script -----
  295. on mouseUp
  296.   groupThree
  297. end mouseUp
  298.  
  299.  
  300.  
  301. -- part 14 (button)
  302. -- low flags: 00
  303. -- high flags: 0000
  304. -- rect: left=301 top=218 right=257 bottom=390
  305. -- title width / last selected line: 0
  306. -- icon id / first selected line: 0 / 0
  307. -- text alignment: 1
  308. -- font id: 0
  309. -- text size: 12
  310. -- style flags: 0
  311. -- line height: 16
  312. -- part name: 
  313. ----- HyperTalk script -----
  314. on mouseUp
  315.   groupThree
  316. end mouseUp
  317.  
  318.  
  319.  
  320. -- part contents for background part 19
  321. ----- text -----
  322. 12
  323. 12
  324. 12
  325. 12
  326. 12
  327. 11
  328. 12
  329. 12
  330.  
  331. -- part contents for background part 20
  332. ----- text -----
  333. 47
  334. 80
  335. 53
  336. 54
  337. 52
  338. 102
  339. 48
  340. 13
  341.  
  342. -- part contents for background part 21
  343. ----- text -----
  344. Abrosimoff, Michael John
  345. Adams, Bryan
  346. Alexander, Rick
  347.  Alexander, Susan
  348. Allsop, Blair M.
  349. Azimov, Isaac
  350.  Barisoff, Larissa
  351. Bunyan, Paul
  352.  
  353.  
  354.  
  355. -- part contents for background part 22
  356. ----- text -----
  357. Industrial
  358. Academic
  359. Academic
  360. Academic
  361. Academic
  362. Academic
  363. Academic
  364. Commercial
  365.  
  366. -- part contents for background part 23
  367. ----- text -----
  368. 0.0
  369. 0.0
  370. 0.0
  371. 0.0
  372. 0.0
  373. 0.0
  374. 0.0
  375. 0.0
  376.  
  377. -- part contents for background part 24
  378. ----- text -----
  379. 0.0
  380. 0.0
  381. 0.0
  382. 0.0
  383. 0.0
  384. 0.0
  385. 0.0
  386. 0.0
  387.  
  388. -- part contents for background part 25
  389. ----- text -----
  390. 12.0
  391. 12.0
  392. 12.0
  393. 12.0
  394. 12.0
  395. 12.0
  396. 12.0
  397. 12.0
  398.  
  399. -- part contents for card part 15
  400. ----- text -----
  401. RESERVED